home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Interactive 1
/
PC World Interactive 1 - Nisan 1997.iso
/
nostalji
/
altin
/
6510
/
altrutin.ler
< prev
next >
Wrap
Text File
|
1980-03-18
|
2KB
|
113 lines
Isinize yarayacak bir kac altrutin olustrulmustur. Yazilacak prog-
ramlarda bu rutinleri cagirabilirsiniz. Butun rutinleri JSR komutu ile
cagirmalisiniz (bilmeyenler icin...).
- Klavye tamponundan bir karakter al
Adres : C200
Giris : yok
Donus : Accumulator'de (A) tampondan okunan ascii deger
- Korsurun bulundugu noktaya bir karakter bas
Adres : C214
Giris : A = yazilacak ascii deger
Donus : Yok
- Ekrani sil
Adres : C234
Giris : yok
Donus : yok
- Mouse koordinatlarini al
Adres : C244
Giris : Yok
Donus : X = mouse x koordinati
Y = mouse y koordinati
- Mouse button degerlerini al
Adres : C24B
Giris : Yok
Donus : X = mouse buton degeri (x=1 sol tus,x=2 sag tus, x=3 her ikisi)
- PC portlarindan deger al (byte)
Adres : C24F
Giris : X = adres lo
Y = adres hi
Donus : A = porttan okunan deger
- PC portlarina deger yaz (byte)
Adres : C26B
Giris : A= porta yazilacak deger
X = adres lo
Y = adres hi
Donus : Yok
- Korsur'un bulundugu noktadan itibaren ekrana string yaz
Adres : C287
Giris : X = string'in bulundugu adres lo
Y = string'in bulundugu adres hi
Not: String'in son karekteri #00 olmalidir.
Donus : Yok
- Mouse'u aktif et
Adres : C2A0
Giris : Yok
Donus : Yok
- Mouse'u pasif et
Adres : C2AC
Giris : Yok
Donus : Yok
- Mouse'a X siniri koy
Adres : C2ED
Giris : X = x koordinatinin en sol degeri (default=00)
Y = x koordinatinin en sag degeri (default=27h)
Donus : Yok
- Mouse'a Y siniri koy
Adres : C2F4
Giris : X = y koordinatinin en sol degeri (default=00)
Y = y koordinatinin en sag degeri (default=18h)
Donus : Yok
- Korsur konumla
Adres : C312
Giris : X = korsur x koordinati (0..$27)
Y = korsur y koordinati (0..$18)
Donus : Yok